home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ADA Programming Guide
/
ADA Programming Guide.iso
/
ada_lrm
/
lr2sv.src
< prev
next >
Wrap
Text File
|
1996-01-30
|
896b
|
32 lines
-- ON-LINE Ada LANGUAGE REFERENCE MANUAL
-- Developed at Nofolk State University
-- Development funded by a grant from the U. S. Army
-- Project ReDTEA
-- Version 1.0 released December 1988
-- Programmer: Esther M. Lumsdon
-- Project Director: George C. Harrison, PhD
with TEXT_IO; use TEXT_IO;
package MACHINE_SPECIFIC is
---------------
-- VAX VMS with SMG --
---------------
SCREEN_WIDTH : NATURAL := 80;
-- maximum number of characters that can be displayed on a line without wrap
-- value for VAX VMS
SCREEN_HEIGHT : NATURAL := 23; ----- old value. changed 7 DEC 88. 24;
-- line number on screen of location for prompts. Bottom line of screen.
-- value for VAX VMS
procedure CLS;
end MACHINE_SPECIFIC;